

If ProcessExists("Rogue Tools.exe") Then
	$f = 0
Else
	MsgBox(4096, "Rogue Tools?", "You need to be running Rogue Tools in order to use this control")
	Exit
EndIf

$filepa = FileOpen(@ProgramFilesDir & "\burnersware\Rogue Tools\include\vars\partyvars.txt", 0)
$alt1pa = FileReadLine($filepa, 1)
$alt2pa = FileReadLine($filepa, 2)
$alt3pa = FileReadLine($filepa, 3)
$alt4pa = FileReadLine($filepa, 4)
$alt5pa = FileReadLine($filepa, 5)
$alt6pa = FileReadLine($filepa, 6)
$alt7pa = FileReadLine($filepa, 7)
$alt8pa = FileReadLine($filepa, 8)
$alt9pa = FileReadLine($filepa, 9)
$alt1tpa = FileReadLine($filepa, 10)
$alt2tpa = FileReadLine($filepa, 11)
$alt3tpa = FileReadLine($filepa, 12)
$alt4tpa = FileReadLine($filepa, 13)
$alt5tpa = FileReadLine($filepa, 14)
$alt6tpa = FileReadLine($filepa, 15)
$alt7tpa = FileReadLine($filepa, 16)
$alt8tpa = FileReadLine($filepa, 17)
$alt9tpa = FileReadLine($filepa, 18)
FileClose($filepa)

Global $resa = @DesktopWidth
Global $resb = @DesktopHeight
Global $winadded = $resa + $resb

If $winadded <> 1400 And $winadded <> 1792 And $winadded <> 2304 And $winadded <> 2800 Then
	nowinres()
EndIf

GUICreate("Rogue Party", 550, 380, -1, -1, -1, $WS_EX_TOOLWINDOW + $WS_EX_TOPMOST)
GUICtrlCreatePic(@ProgramFilesDir & "\burnersware\Rogue Tools\Include\img\burnerssidebarparty.jpg", 0, 22, 155, 360)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("ALT Macros--------------Delay", 170, 80, 170, 165)
GUIStartGroup()
GUISetFont(24, 400,)
GUICtrlCreateLabel("1", 180, 95, 17, 33)
GUISetFont(9, 400)
$alt11 = GUICtrlCreateRadio("On", 210, 100, 45, 15)
$alt10 = GUICtrlCreateRadio("Off", 210, 115, 45, 15)
If $alt1pa = 1 Then
	GUICtrlSetState($alt11, $GUI_CHECKED)
EndIf
If $alt1pa = 4 Then
	GUICtrlSetState($alt10, $GUI_CHECKED)
EndIf
GUISetFont(9, 400)
$alt1m = GUICtrlCreateCombo("0", 255, 105, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
$alt1s = GUICtrlCreateCombo("0", 295, 105, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
GUIStartGroup()
GUISetFont(24, 400,)
GUICtrlCreateLabel("2", 180, 130, 17, 33)
GUISetFont(9, 400)
$alt21 = GUICtrlCreateRadio("On", 210, 135, 45, 15)
$alt20 = GUICtrlCreateRadio("Off", 210, 150, 45, 15)
If $alt2pa = 1 Then
	GUICtrlSetState($alt21, $GUI_CHECKED)
EndIf
If $alt2pa = 4 Then
	GUICtrlSetState($alt20, $GUI_CHECKED)
EndIf
GUISetFont(9, 400)
$alt2m = GUICtrlCreateCombo("0", 255, 140, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
$alt2s = GUICtrlCreateCombo("0", 295, 140, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
GUIStartGroup()
GUISetFont(24, 400,)
GUICtrlCreateLabel("3", 180, 165, 17, 33)
GUISetFont(9, 400)
$alt31 = GUICtrlCreateRadio("On", 210, 170, 45, 15)
$alt30 = GUICtrlCreateRadio("Off", 210, 185, 45, 15)
If $alt3pa = 1 Then
	GUICtrlSetState($alt31, $GUI_CHECKED)
EndIf
If $alt3pa = 4 Then
	GUICtrlSetState($alt30, $GUI_CHECKED)
EndIf
GUISetFont(9, 400)
$alt3m = GUICtrlCreateCombo("0", 255, 175, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
$alt3s = GUICtrlCreateCombo("0", 295, 175, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
GUIStartGroup()
GUISetFont(24, 400,)
GUICtrlCreateLabel("4", 180, 200, 17, 33)
GUISetFont(9, 400)
$alt41 = GUICtrlCreateRadio("On", 210, 205, 45, 15)
$alt40 = GUICtrlCreateRadio("Off", 210, 220, 45, 15)
If $alt4pa = 1 Then
	GUICtrlSetState($alt41, $GUI_CHECKED)
EndIf
If $alt4pa = 4 Then
	GUICtrlSetState($alt40, $GUI_CHECKED)
EndIf
GUISetFont(9, 400)
$alt4m = GUICtrlCreateCombo("0", 255, 210, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
$alt4s = GUICtrlCreateCombo("0", 295, 210, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
GUISetFont(9, 400)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("ALT Macros--------------Delay", 365, 80, 170, 200)
GUIStartGroup()
GUISetFont(24, 400,)
GUICtrlCreateLabel("5", 375, 95, 17, 33)
GUISetFont(9, 400)
$alt51 = GUICtrlCreateRadio("On", 405, 100, 45, 15)
$alt50 = GUICtrlCreateRadio("Off", 405, 115, 45, 15)
If $alt5pa = 1 Then
	GUICtrlSetState($alt51, $GUI_CHECKED)
EndIf
If $alt5pa = 4 Then
	GUICtrlSetState($alt50, $GUI_CHECKED)
EndIf
GUISetFont(9, 400)
$alt5m = GUICtrlCreateCombo("0", 450, 105, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
$alt5s = GUICtrlCreateCombo("0", 490, 105, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
GUIStartGroup()
GUISetFont(24, 400,)
GUICtrlCreateLabel("6", 375, 130, 17, 33)
GUISetFont(9, 400)
$alt61 = GUICtrlCreateRadio("On", 405, 135, 45, 15)
$alt60 = GUICtrlCreateRadio("Off", 405, 150, 45, 15)
If $alt6pa = 1 Then
	GUICtrlSetState($alt61, $GUI_CHECKED)
EndIf
If $alt6pa = 4 Then
	GUICtrlSetState($alt60, $GUI_CHECKED)
EndIf
GUISetFont(9, 400)
$alt6m = GUICtrlCreateCombo("0", 450, 140, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
$alt6s = GUICtrlCreateCombo("0", 490, 140, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
GUIStartGroup()
GUISetFont(24, 400,)
GUICtrlCreateLabel("7", 375, 165, 17, 33)
GUISetFont(9, 400)
$alt71 = GUICtrlCreateRadio("On", 405, 170, 45, 15)
$alt70 = GUICtrlCreateRadio("Off", 405, 185, 45, 15)
If $alt7pa = 1 Then
	GUICtrlSetState($alt71, $GUI_CHECKED)
EndIf
If $alt7pa = 4 Then
	GUICtrlSetState($alt70, $GUI_CHECKED)
EndIf
GUISetFont(9, 400)
$alt7m = GUICtrlCreateCombo("0", 450, 175, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
$alt7s = GUICtrlCreateCombo("0", 490, 175, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
GUIStartGroup()
GUISetFont(24, 400,)
GUICtrlCreateLabel("8", 375, 200, 17, 33)
GUISetFont(9, 400)
$alt81 = GUICtrlCreateRadio("On", 405, 205, 45, 15)
$alt80 = GUICtrlCreateRadio("Off", 405, 220, 45, 15)
If $alt8pa = 1 Then
	GUICtrlSetState($alt81, $GUI_CHECKED)
EndIf
If $alt8pa = 4 Then
	GUICtrlSetState($alt80, $GUI_CHECKED)
EndIf
GUISetFont(9, 400)
$alt8m = GUICtrlCreateCombo("0", 450, 210, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
$alt8s = GUICtrlCreateCombo("0", 490, 210, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
GUIStartGroup()
GUISetFont(24, 400,)
GUICtrlCreateLabel("9", 375, 235, 17, 33)
GUISetFont(9, 400)
$alt91 = GUICtrlCreateRadio("On", 405, 240, 45, 15)
$alt90 = GUICtrlCreateRadio("Off", 405, 255, 45, 15)
If $alt9pa = 1 Then
	GUICtrlSetState($alt91, $GUI_CHECKED)
EndIf
If $alt9pa = 4 Then
	GUICtrlSetState($alt90, $GUI_CHECKED)
EndIf
GUISetFont(9, 400)
$alt9m = GUICtrlCreateCombo("0", 450, 245, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
$alt9s = GUICtrlCreateCombo("0", 490, 245, 37, 150, BitOR($ES_READONLY, $CBS_DROPDOWNLIST, $LBS_STANDARD, $CBS_NOINTEGRALHEIGHT))
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59", "0")
GUISetFont(9, 400)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", 465, 308, 80, 47)
$OKparty = GUICtrlCreateButton("RUN", 475, 325, 60, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlSetState(-1, $GUI_CHECKED)



GUISetState()
While 1
	$msg = GUIGetMsg()
	If $msg = $OKparty Then
		partyc()
		partyr()
	EndIf
	If $msg = $GUI_EVENT_CLOSE Then Exit

	Local $alt1mm = Round(GUICtrlRead($alt1m) * 100 / 1.65, -1)
	Local $alt2mm = Round(GUICtrlRead($alt2m) * 100 / 1.65, -1)
	Local $alt3mm = Round(GUICtrlRead($alt3m) * 100 / 1.65, -1)
	Local $alt4mm = Round(GUICtrlRead($alt4m) * 100 / 1.65, -1)
	Local $alt5mm = Round(GUICtrlRead($alt5m) * 100 / 1.65, -1)
	Local $alt6mm = Round(GUICtrlRead($alt6m) * 100 / 1.65, -1)
	Local $alt7mm = Round(GUICtrlRead($alt7m) * 100 / 1.65, -1)
	Local $alt8mm = Round(GUICtrlRead($alt8m) * 100 / 1.65, -1)
	Local $alt9mm = Round(GUICtrlRead($alt9m) * 100 / 1.65, -1)
WEnd

Func partyc()
	$fileparty = FileOpen(@ProgramFilesDir & "\burnersware\Rogue Tools\include\vars\partyvars.txt", 2)
	FileWrite($fileparty, GUICtrlRead($alt11) & @CRLF)
	FileWrite($fileparty, GUICtrlRead($alt21) & @CRLF)
	FileWrite($fileparty, GUICtrlRead($alt31) & @CRLF)
	FileWrite($fileparty, GUICtrlRead($alt41) & @CRLF)
	FileWrite($fileparty, GUICtrlRead($alt51) & @CRLF)
	FileWrite($fileparty, GUICtrlRead($alt61) & @CRLF)
	FileWrite($fileparty, GUICtrlRead($alt71) & @CRLF)
	FileWrite($fileparty, GUICtrlRead($alt81) & @CRLF)
	FileWrite($fileparty, GUICtrlRead($alt91) & @CRLF)
	FileWrite($fileparty, $alt1mm + GUICtrlRead($alt1s) & "000" & @CRLF)
	FileWrite($fileparty, $alt2mm + GUICtrlRead($alt2s) & "000" & @CRLF)
	FileWrite($fileparty, $alt3mm + GUICtrlRead($alt3s) & "000" & @CRLF)
	FileWrite($fileparty, $alt4mm + GUICtrlRead($alt4s) & "000" & @CRLF)
	FileWrite($fileparty, $alt5mm + GUICtrlRead($alt5s) & "000" & @CRLF)
	FileWrite($fileparty, $alt6mm + GUICtrlRead($alt6s) & "000" & @CRLF)
	FileWrite($fileparty, $alt7mm + GUICtrlRead($alt7s) & "000" & @CRLF)
	FileWrite($fileparty, $alt8mm + GUICtrlRead($alt8s) & "000" & @CRLF)
	FileWrite($fileparty, $alt9mm + GUICtrlRead($alt9s) & "000" & @CRLF)
	FileClose($fileparty)
EndFunc ;==>partyc

Func partyr()
	Run("Rogue Party Bot.exe")
	Exit
EndFunc ;==>partyr

Func nowinres()
	MsgBox(4096, "Resolution Error", "Your current windows resolution is not supported _
			"  & @CRLF & " Please Switch To one of the four supported resolutions And restart Burners 7in1 Software"  & @CRLF & " These Include 800x600 & 1024x768 & 1280x1024 & 1600x1200 _
			" & @CRLF & " Thank You")
	Exit
EndFunc ;==>nowinres

